home *** CD-ROM | disk | FTP | other *** search
/ Adventures with Oslo: Tools & Gadgets / Adventures with Oslo - Tools and Gadgets.ISO / mac / Studio / Studio.Dir / 00024_hide erasers.ls < prev    next >
Encoding:
Text File  |  1994-09-23  |  399 b   |  16 lines

  1. on mouseUp
  2.   set the castNum of sprite 19 to the number of cast "show erasers"
  3.   puppetSound("Whazip Beep")
  4.   updateStage()
  5.   if the machineType <> 256 then
  6.     wait(20)
  7.   end if
  8.   repeat with i = 1 to 12
  9.     set the locH of sprite 15 to the locH of sprite 15 + 5
  10.     set the locV of sprite 15 to the locV of sprite 15 - 3
  11.     updateStage()
  12.   end repeat
  13.   repeat while soundBusy(1)
  14.   end repeat
  15. end
  16.